Author: Stephen Chbosky

“There’s nothing like deep breaths after laughing that hard. Nothing in the world like a sore stomach for the right reasons.”

― Stephen Chbosky, The Perks Of Being A Wallflower

Summary

Charlie is a freshman.

And while he’s not the biggest geek in the school, he is by no means popular. Shy, introspective, intelligent beyond his years yet socially awkward, he is a wallflower, caught between trying to live his life and trying to run from it.

Charlie is attempting to navigate his way through uncharted territory: the world of first dates and mix tapes, family dramas and new friends; the world of sex, drugs, and The Rocky Horror Picture Show, when all one requires is that perfect song on that perfect drive to feel infinite. But he can’t stay on the sideline forever. Standing on the fringes of life offers a unique perspective. But there comes a time to see what it looks like from the dance floor.

The Perks of Being a Wallflower is a deeply affecting coming-of-age story that will spirit you back to those wild and poignant roller-coaster days known as growing up.

Recent Tweets

## [1] "jocey_gem: RT @steffanargus: why do i simultaneously feel like every character in perks of being a wallflower."
## [1] "sumayyakhadijah: RT @steffanargus: why do i simultaneously feel like every character in perks of being a wallflower."
## [1] "lilactaylor: RT @steffanargus: why do i simultaneously feel like every character in perks of being a wallflower."
## [1] "kemmendorfer12: RT @moviepoets: The Perks of Being A Wallflower (2012) https://t.co/xPW37O1oz7"
## [1] "Jekinha01: RT @Moviepicts: Perks of Being a Wallflower https://t.co/j28yhpCx6k"
## [1] "saliunca: RT @fiImart: The Perks of Being a Wallflower (2012) https://t.co/Cc3R82PoP3"
## [1] "kmeliiissa: RT @MOVIEMEMORlES: The Perks of Being a Wallflower https://t.co/pBM4BsyEhN"
## [1] "areejzadj: RT @steffanargus: why do i simultaneously feel like every character in perks of being a wallflower."
## [1] "blessedwithsins: The perks of being a wallflower \xed\xa0\xbd\xed\xb2\x95\xed\xa0\xbd\xed\xb2\x95\xed\xa0\xbd\xed\xb2\x95 https://t.co/xx5Klv24i6"
## [1] "_soosuox: RT @moviepoets: The Perks of Being A Wallflower (2012) https://t.co/xPW37O1oz7"
## [1] "vidimovie: #ThePerksOfBeingAWallflower (2012) on #Vidimovie\nWatch Videos: https://t.co/W9KCDtzDhC"
## [1] "_ashhee_: RT @moviepoets: The Perks of Being A Wallflower (2012) https://t.co/xPW37O1oz7"
## [1] "peachyangelboy: RT @beaufilms: The Perks of Being A Wallflower (2012) https://t.co/hlZ1eRIQwV"
## [1] "I_Am_Tage: The Perks of being a wallflower \xed\xa0\xbc\xed\xbe\x88"
## [1] "reading_rachelh: RT @moviepoets: The Perks of Being A Wallflower (2012) https://t.co/xPW37O1oz7"
## [1] "Aidadelz: RT @fiImart: “Things change. And friends leave. Life doesn't stop for anybody.” \n\nThe Perks of Being a Wallflower (2012) https://t.co/Xbewe…"
## [1] "sann_1997: RT @beaufilms: Charlie's last letter / the tunnel scene from The Perks of Being a Wallflower (2012) makes me cry every single time https://…"
## [1] "sann_1997: RT @beaufilms: The Perks of Being A Wallflower (2012) https://t.co/hlZ1eRIQwV"
## [1] "articun0ex: RT @steffanargus: why do i simultaneously feel like every character in perks of being a wallflower."
## [1] "Aidadelz: RT @fiImart: The Perks of Being a Wallflower (2012) https://t.co/Cc3R82PoP3"
## 
## The downloaded binary packages are in
##  /var/folders/ny/hkylpsnn3qs2pg8wdvtfwx_m0000gn/T//Rtmpn9FhqE/downloaded_packages

Recent Tweets

This spiral graph shows when the tweets were sent out within the last seven days. Each circle represents a new day. Starting with the first tweet in the middle. R is day. T is hour of the day. The graph is similar to a clock, but based on the first tweet. The first tweet is the midnight of the clock. A tweet at 6 am on this clock is 6 hours after the first tweet was posted.

library(plotly)
## Loading required package: ggplot2
## 
## Attaching package: 'ggplot2'
## The following object is masked from 'package:NLP':
## 
##     annotate
## 
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
## 
##     last_plot
## The following object is masked from 'package:httr':
## 
##     config
## The following object is masked from 'package:stats':
## 
##     filter
## The following object is masked from 'package:graphics':
## 
##     layout
library(lubridate)
## 
## Attaching package: 'lubridate'
## The following object is masked from 'package:base':
## 
##     date
####### EDIT THE NEXT LINE TO SPECIFY SEARCH
tweets_raw = searchTwitter(search_term, n=sample_size, lang=language)
## [1] "Rate limited .... blocking for a minute and retrying up to 119 times ..."
## [1] "Rate limited .... blocking for a minute and retrying up to 118 times ..."
## [1] "Rate limited .... blocking for a minute and retrying up to 117 times ..."
## [1] "Rate limited .... blocking for a minute and retrying up to 116 times ..."
## [1] "Rate limited .... blocking for a minute and retrying up to 115 times ..."
####### EDIT THE PREVIOUS LINE TO SPECIFY SEARCH

############  CREATE DATA FRAME ##########################
DF = twListToDF(tweets_raw) 

# TO SAVE:
write.csv(DF,file='wallflower_tweets.csv')

DF <- read.csv(file='wallflower_tweets.csv', sep=',', header=TRUE)
dtime <- rep(NA,nrow(DF))
for (i in 1:nrow(DF)) {
  dtime[i] = difftime(ymd_hms(DF$created[1]), ymd_hms(DF$created[i]), unit='days')
}

r <- dtime
theta <- r%%1*360
tweettimes = data.frame(r=r,t=theta)
p <- plot_ly(
  #plotly::hobbs, r = ~r, t = ~t, color = ~nms, alpha = 0.5, type = "scatter"
  tweettimes, r=~r, t=~t, alpha=0.5, type="scatter" 
)

layout(p, title = "Hobbs-Pearson Trials", plot_bgcolor = toRGB("grey90"))
## No scatter mode specifed:
##   Setting the mode to markers
##   Read more about this attribute -> https://plot.ly/r/reference/#scatter-mode

Key Themes

Extras

  • summary from Goodreads

  • extras from Barnes & Noble